home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 6 / FM Towns Free Software Collection 6.iso / t_os / vdtwn / tvf / asmhd6 / comdhd6 / j_bdd.hd6 < prev    next >
Text File  |  1993-07-08  |  1KB  |  97 lines
  1. ds_name        db    '\KOMEI\実物\TVF_PRG\J_BDD',0
  2.  
  3. paint_wd:
  4.      SET_P dt1
  5.      SET_P dt2
  6.      SET_P dt3
  7. re_paint:
  8.      WD_CLS 0
  9.      BOX boxdt,1
  10.      MOZI mozidt
  11. be_called:
  12.      ret
  13.  
  14. mouse_in:
  15.       cmp ch,1
  16.      je mouseck
  17.       ret
  18.  
  19. mouseck:
  20.      MOU boxdt,1
  21.  
  22.      cmp bx,1                  ;bx=1 find
  23.      je short mck1             ;ax = no
  24.      ret
  25. mck1:
  26.      cmp ax,1
  27.      je find1    
  28.      ret
  29. find1:
  30.      mov ax,1
  31.      KAKU 306,ax
  32.      CALL_P dt1
  33.      CALL_P dt2
  34.      CALL_P dt3
  35.  
  36.      GAMEN 1632
  37.      
  38.      mov ah,25
  39.      mov al,2
  40.      mov bx,0
  41.      call komei
  42.  
  43.      mov ah,27
  44.      call komei
  45.  
  46.  
  47.      ret
  48. look_me:
  49.      call sub_esi
  50.      dd 0,0
  51.      dw     1,0,17*8,26,382,90+30*5,15,5,0,0
  52.  
  53.  
  54.  
  55. boxdt:
  56.     call sub_edi
  57.         dw    1,17*8-4,24,2,2,0,20,12,7,0
  58.  
  59.  
  60. ; [count][sz_x][sz_y][off_x][off_y][+x][+y][f_col][b_col][s_no]
  61.  
  62. mozidt:
  63.     call sub_edi
  64.            dw    0        ;screen_no
  65.            dw    1      ; mozi_color
  66.            dw    2      ; 書き出し位置  x
  67.            dw    2      ;          y
  68.            dw    10      ; next offset x
  69.            dw    0      ; next offset y
  70.     
  71.                dw   1      ; gyo suu
  72.                    db    '上の色と加工３ ',0
  73.                 dw 0,0
  74.  
  75.  
  76. dt1:
  77.      call sub_edi
  78.      dw     ?
  79.      db 'F_COL',0
  80. dt3:
  81.      call sub_edi
  82.      dw     ?
  83.      db 'P_BDD',0
  84. dt2:
  85.      call sub_edi
  86.      dw     ?
  87.      db 'H_DG',0
  88.  
  89. p_set:
  90.      M_P_SET
  91. p_call:
  92.  
  93.          M_P_CALL
  94.  
  95.  
  96.  
  97.